home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CinE CD 6
/
CinE CD ROM 06.iso
/
pc
/
playqt.dir
/
00014_Script_keydown_handler
< prev
Wrap
Text File
|
1996-06-21
|
673b
|
26 lines
on keyDown_handler
global gsoundlevel
if the key = "-" then
set gsoundFlag = 1 - gsoundFlag
set the soundenabled to not (the soundenabled)
else
if "01234567" contains the key then
set gsoundLevel = value (the key)
set the soundLevel = gsoundlevel
-- set the volume of sprite 1 = gsoundlevel * 32
-- tell the stage to set the castnum of sprite 17 = the number of cast "V0.PIC" + the soundLevel
updatestage
-- starttimer
-- repeat while the timer < 15
---wait for counter
-- end repeat
end if
end if
dontpassevent
end keyDown_handler